home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 22 / PC Actual CD 22.iso / SHARE / prog / POVRAY / E-P-O.ZIP / THING-4.INC < prev    next >
Encoding:
Text File  |  1996-10-31  |  1.5 KB  |  56 lines
  1.  
  2. //------------------------------------------------------------------->
  3. //
  4. // thing-4.inc
  5. //
  6. // "Easy POV Oven"
  7. //
  8. // Written By: Paul T. Dawson
  9. //             ptdawson@voicenet.com
  10. //             http://www.voicenet.com/~ptdawson
  11. //
  12. // All code and techniques are PUBLIC DOMAIN - have fun with it!
  13. //
  14. //------------------------------------------------------------------->
  15. //
  16. // Thing_4 is another jumble of spheres, all random colors.
  17. //
  18. //------------------------------------------------------------------->
  19. //
  20. // These spheres poke through the bottom of the pan, and through the
  21. // wooden table, but you can't see it in the final scene!?!
  22.  
  23.         #declare Thing_4 =
  24.  
  25.         union {
  26.  
  27.         #declare A = 1 #while ( A <= 200 )
  28.  
  29.                 sphere { 0, 0.5
  30.                         scale < 8.0, 0.1, 1.0 >
  31.  
  32.                         #declare RR = rand(R1)+0.3-0.3
  33.                         #declare GG = rand(R1)+0.3-0.3
  34.                         #declare BB = rand(R1)+0.3-0.3
  35.                         pigment { color rgb < RR, GG, BB > }
  36.  
  37.                         #declare XROT = rand(R1)*360
  38.                         #declare YROT = rand(R1)*360
  39.                         #declare ZROT = rand(R1)*360
  40.                         rotate < XROT, YROT, ZROT >
  41.  
  42.                         } // End of sphere.
  43.  
  44.         #declare A = A + 1 #end
  45.  
  46.         scale < 1.2, 1, 1.2 >
  47.  
  48.         finish { F_MetalE }
  49.  
  50.         } // End of union.
  51.  
  52. //------------------------------------------------------------------->
  53. //
  54. // End of this file.
  55.  
  56.